home *** CD-ROM | disk | FTP | other *** search
/ Click Press Kit / Click Press Kit.iso / pc / main.dxr / Internal_49_slideShowFrameCode.ls < prev    next >
Encoding:
Text File  |  2006-05-31  |  3.5 KB  |  95 lines
  1. property pRectSprite, pPhotoSprite, pPushPinSprite, pFlashSprite, pSavedSprite, pLogoSprite, pSavedGraphic, pUnSavedGraphic
  2. global gMaster, gSound, gTracker
  3.  
  4. on enterFrame me
  5.   sendAllSprites(#mSetUpGraphics)
  6.   sendAllSprites(#mSetUpGraphicsDouble, "slideshow", 0)
  7. end
  8.  
  9. on exitFrame me
  10.   gSound.mResumeSound()
  11.   gMaster.pmarker = the frameLabel
  12.   gTracker.mAddSection(gMaster.pmarker)
  13.   pLogoSprite = 3
  14.   pRectSprite = 28
  15.   pPhotoSprite = 29
  16.   pPushPinSprite = 30
  17.   pFlashSprite = 31
  18.   pSavedSprite = 26
  19.   vList = [22, 23, 24]
  20.   repeat with x = 1 to vList.count
  21.     sprite(vList[x]).visible = 1
  22.   end repeat
  23.   pSavedGraphic = member(gMaster.pSlideShowSettings.savedbutton, "assets")
  24.   pUnSavedGraphic = member(gMaster.pSlideShowSettings.savebutton, "assets")
  25.   mSetSlideShowImage(me)
  26. end
  27.  
  28. on mSetSlideShowImage me
  29.   vTotal = gMaster.pPhotoList.count
  30.   vNum = gMaster.pActivePhotoObject.pPhotoNumber
  31.   member("OneOf").text = vNum & " of " & vTotal
  32.   sprite(pPhotoSprite).member = member(gMaster.pActivePhotoObject.pSmallName, gMaster.pMediumCastLib)
  33.   gTracker.mAddPhotoView(gMaster.pActivePhotoObject.pSmallName)
  34.   if gMaster.pSlideShowSettings.xyeffect = "TRUE" then
  35.     sprite(pPhotoSprite).loc = gMaster.pActivePhotoObject.pXYSlide
  36.     vMemberWidth = member(gMaster.pActivePhotoObject.pSmallName, gMaster.pMediumCastLib).width
  37.     vMemberHeight = member(gMaster.pActivePhotoObject.pSmallName, gMaster.pMediumCastLib).height
  38.     vWidth = vMemberWidth * float("." & gMaster.pSlideShowSettings.percentage)
  39.     vHeight = vMemberHeight * float("." & gMaster.pSlideShowSettings.percentage)
  40.     if gMaster.pSlideShowSettings.percentage = 100 then
  41.       sprite(pPhotoSprite).width = vMemberWidth
  42.       sprite(pPhotoSprite).height = vMemberHeight
  43.     else
  44.       sprite(pPhotoSprite).width = vWidth
  45.       sprite(pPhotoSprite).height = vHeight
  46.     end if
  47.     updateStage()
  48.   end if
  49.   if gMaster.pSlideShowSettings.blendeffect = "TRUE" then
  50.     if gMaster.pActivePhotoObject.pSelected = "no" then
  51.       sprite(pPhotoSprite).blend = 100
  52.     else
  53.       sprite(pPhotoSprite).blend = gMaster.pSlideShowSettings.blendpercent
  54.     end if
  55.   end if
  56.   if gMaster.pSlideShowSettings.rectangles = "TRUE" then
  57.     if gMaster.pActivePhotoObject.pSelected = "no" then
  58.       sprite(pRectSprite).rect = rect(-2000, -2000, -1999, 1999)
  59.     else
  60.       vLeft = sprite(pPhotoSprite).left - 2
  61.       vTop = sprite(pPhotoSprite).top - 2
  62.       vRight = sprite(pPhotoSprite).right + 2
  63.       vBottom = sprite(pPhotoSprite).bottom + 2
  64.       sprite(pRectSprite).rect = rect(vLeft, vTop, vRight, vBottom)
  65.     end if
  66.   end if
  67.   if gMaster.pSlideShowSettings.pushpin = "TRUE" then
  68.     if gMaster.pActivePhotoObject.pSelected = "no" then
  69.       sprite(pPushPinSprite).loc = point(-2000, -2000)
  70.     else
  71.       vLeft = sprite(pPhotoSprite).left + gMaster.pSlideShowSettings.pinoffset[1]
  72.       vTop = sprite(pPhotoSprite).top + gMaster.pSlideShowSettings.pinoffset[2]
  73.       sprite(pPushPinSprite).loc = point(vLeft, vTop)
  74.     end if
  75.   end if
  76.   if gMaster.pSlideShowSettings.xyflasheffect = "TRUE" then
  77.     sprite(pFlashSprite).loc = gMaster.pActivePhotoObject.pXYFlash
  78.   else
  79.     nothing()
  80.   end if
  81.   if gMaster.pSlideShowSettings.titlelogoeffect = "TRUE" then
  82.     sprite(pLogoSprite).member = member(gMaster.pActivePhotoObject.pTitleSlide)
  83.   else
  84.     nothing()
  85.   end if
  86.   vNewname = gMaster.pActivePhotoObject.pFlashLabel
  87.   if gMaster.pLanguageMode = "english" then
  88.     vNewname = vNewname & "e"
  89.   else
  90.     vNewname = vNewname & "s"
  91.   end if
  92.   sprite(pFlashSprite).goToFrame(vNewname)
  93.   updateStage()
  94. end
  95.